- Canali
- Scripts
- Asp
- Invio emails
Email musicale
Email musicale
Inviare una email con in sottofondo una cansone.
Con questo script è possibile inviare una email con in allegato un file .mid. Il file .mid viene allegato all'email e poi nel corpo html dell'email viene richiamato il file .mid e quindi viene riprodotto all'aprire l'email da parte di chi la riceve. Nell'esempio viene allegato un file di nome ghost.mid (dal celebre film "Ghost") e poi nel corpo dell'email viene richiamato in modo tale da riprodurre il file audio quando si visualizza il testo html dell'email.
<%
Set objMail = CreateObject("CDONTS.NewMail")
objMail.Attachurl Server.MapPath("ghost.mid"), "ghost.mid"
HTML = "<html><head>" &_
"<title>Prova email</title>"&_
"<bgsound src=""ghost.mid"" loop=""-1"">" & _
"</head>" &_
"<body bgcolor=""#FFFFFF"">" &_
"Questa email ha come sottofondo una cansone. <BR>" &_
"</body>" &_
"</html>"
objMail.From = "esempio@dominio.it"
objMail.To = "emailesempio@dominio.it"
objMail.Subject = "Oggetto email con musichetta"
objMail.BodyFormat = 0
objMail.MailFormat = 0
objMail.Body = HTML
objMail.Send()
Set objMail = Nothing
response.write "E-mail inviata"
%>
<bgsound src="ghost.mid" loop="-1">
asp, programmare, incidenti, radio, immagini, video, cerca lavoro, cap, van basten, senna, sport, sorpassi, php, javascript, chat, scarica, automobili, lamborghini, maradona, download
